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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
vaanerehetee’ NC TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
eepPokat ite NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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FACILITY: Mtaacp 
ABSTRACT: 


This routine performs the general embedded wild card matching 
algorithm. 


ENVIRONMENT: 


OOOOOoOOooOooooooSo 
SOOooooooooooosoo 


VAX/VMS Operating System 


AUTHOR: Andrew C. Goldstein, CREATION DATE: 10-Aug-1979 11:36 
MODIFIED BY: 


PRO OD NA WNL WIN OS OD NAME WN SO OD NAMEN @ OO ODNAU EW OOONO UE wn 
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was taken from the Files-11 Seructure Level 2 ACP. No code 


was changed at this time, only comments. 
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Functional Description: 


This routine performs the general embedded wild card matching 
algorithm. 


; Sant ong Joquenset 


| 
; Input Parameters: 
Re = length of candidate string 


DOSOOOSOOOOOOOOOOOOOOOOOSOOoOO 
OoOoOOOoOooooooooooooo 
SoOOQOOoOoOooooooooo 


4; 
: 
69 
62 : 
8 3 
rt: ; 
68 ; RS = address of candidate string 
67 ; R4 = length of pattern string 
0 63 ; R5 = address of pattern string 
0 : Implicit : 
0 4 3 wes —“—- 
5 ” : Output Parameters: 
o ee 3 none 
76 : Implicit Outputs: 
; 7 ; on none vi 
9000 79 : Routines Called: 
EE Pn 
000 Ht : Routine Value: 
000 3 f the strings match 
$000 BS dase 
00 6 : Side Effects: 
000 : R1-R5 destroyed 
4 8 ; 
ie 
0000 000 4. -PSECT SCODES,NOWRT,EXE,WORD 
38 FMGSMATCH_NAME:: 
Be 94 POSHR #*M<R6,R7,R8,R9> ; Save registers 
i) 4 95 MOVL #1,R0 3; Assume success 
04 7 38 CLRL R ; Clear saved string count 
11 9 44 BRB 60$ : Dive into the loop 
GA 99 10S: MOVZBL (R5)+,R1 ; Get next character in pattern string 
91 000E 100 CMPB ORT, #*A'®" : Check for wild string 
13 i 101 BEQL 8 ; Branch if so 
F4 1 1 § § $: SOBGEQ R2,50$ ; Count an input char, br if not done 
D4 8 1 $: CLRL ; Out of input chars - match fails 
BA 1 104 40$: POPR #*M<R6,R7,RB,RI> ; Restore registers 
5 +3 ; 5 RSB 3 
1D 1 ‘ 508: CMPB R1,(R3)+ ; Check target epainst input 
1 1 8 BEQL o$ ; Branch if matc 
91 1 CMPB R1,#*A'R' : Check if single wildcard match 
12 00 110 BNEQ 70$ ; Branch if no match 
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60$: SOBGEQ R4,10$ ; Pattern string exhausted? 
sear Res 3 Input string exhausted? 


; We have detected a mismatch, or we are out of pattern string while there 
; 6 ieee Back up to the last '*', advance a character of the input, 
y again. 


; Branch if yes - success 


i 

1 

1 

14 e 

18 : 

Hi ; 

ig 70S: DECL R ; Count a character from saved input 

0 BLSS 30$ ; Branch if no saved input 

1 INCL R ; Set to try next input character 

§ MOvVa Re «Re ; Restore pointers to backup point 
RB,R ; to retry matching with next char 

4 BRB 60$ 

0 

4 


; We have encountered a * in the pattern string. Save the string pointers 
; for backup and retry. 


bos: TSTL = RG 
40$ 

MOVG = R2, RE 

MOVQ = R4_RB 
60$ 


Pattern string null after ‘'*'? 

"es" at end of pattern matches all. 
Save current string pointers 

of both strings for backup 

and continue testing 


St 3 4 ss a i a ts ts 
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Symbol table . ety 7 85:98:07 MTAACP.SRCJMATCHNAME .MAR; 1 ° (2) 
TY 2 
f Ce-TyPE = 
FMGSMATCH_NAME 01 
L TYPE = 
RVT_TYPE = 
VCB_TYPE = 
WCB_TYPE = 
tenor ae neenocen esa} 
! Psect synopsis ! 
fener ete nm rw eww cnn ¢ 
PSECT name Allocation PSECT No. Attributes 
. ABS 94 $444 ( 9.) 69 ( 0.) NOPIC USR CON ABS _ LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SCODES 0000068 ( 72.) 0O1¢ 1.) NOPIC USR CON REL LCL NOSHR EXE RD NOWRT NOVEC WORD 
pr mr erence mre sc eeanaaaowea + 
H Performance indicators H 
Phase Page faults CPU Time Elapsed Time 
Initialization 41 00:00 8 0:00:01.6 
ommand processing 139 0:00: 
Pass 1 89 
Symbol table sort 0 


ass 
Symbol table output 
Psect synopsis output 


Cross-reference output 9 
Assembler run totals 31 


The working set Limit was 900 pages. 
3025 bytes (6 pages) of virtua 


a 
oO 
Sooooooso 


Ooooocoo 


Soooooooo 


Coooooco 


memory were used to buffer the intermediate cod 


ode. 
There were 10 pages of symbol table space allocated to hold 7 non-local and 8 local symbols. 


20 source Lines were read in Pass 


» producin 


1 
pages of virtual memory were used to define g mac 


Macro Library name 

“$523 SDUACE: ESVS 08 JLIB.MLB;1 
$255$DUA28: CSYSLIBIJSTARLET.MLB;2 
TOTALS (all Libraries) 


: 
peworermean 


object records in Pass 2. 


See eee Se Beso H he ewe + 


Macros defined 


D 


0 


0 GETS were required to define 0 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:MATCHNAME/OBJ=OBJ$:MATCHNAME MSRC$:MTADEF 1/UPDATE=(ENHS:MTADEF 1) +MSRC$:MATCHNAME/UPDATE=(ENHS : MATCHNAME) +EXECML$/LIB 


PMENT CORPORATION 
_AND PROPRIETARY 
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